use Test::More tests => 7;

use lib '../lib';
use Send2ME::Magic::Magic;

is(locale('en-gb,en;q=0.7,de;q=0.3', qw(en ru)), 'en');
is(locale('ru-ru,ru;q=0.8,en-us;q=0.5,en;q=0.3', qw(en ru)), 'ru');
is(locale('q=0.8,en-us;q=0.5,en;q=0.3;ru-ru,ru', qw(en ru)), 'en');
is(locale(undef, qw(en ru)), 'en');
is(locale('', qw(en ru)), 'en');
is(locale('fr', qw(en ru)), 'en');
is(locale('ru', qw(en ru)), 'ru');
